Revista CD Expert 8/Revista CD Expert nº 08 CD1.iso/Utilitarios/Diversos/Coeli Stella 2000/_SETUP.1/Stella.exe/0/RCDATA/TSETUPFORM/TSETUPFORM.txt

Text File | 1999-03-13 | 33KB | 1,238 lines

object SetupForm: TSetupForm
  Left = 269
  Top = 168
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'General Setup'
  ClientHeight = 448
  ClientWidth = 632
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Position = poScreenCenter
  Scaled = False
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnHide = FormHide
  OnShow = FormShow
  PixelsPerInch = 125
  TextHeight = 16
  object PageControl1: TPageControl
    Left = 8
    Top = 7
    Width = 614
    Height = 393
    ActivePage = ObserverTab
    TabOrder = 0
    object MailTab: TTabSheet
      Caption = 'Mail'
      object MailPanel1: TPanel
        Left = 8
        Top = 7
        Width = 592
        Height = 352
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 124
          Width = 82
          Height = 16
          Caption = 'SMTP server:'
        end
        object SMTPLabel1: TBoxLabel
          Left = 16
          Top = 17
          Width = 558
          Height = 85
          Caption =
            'Please enter the name of your SMTP server for outgoing mail, alo' +
            'ng with your e-mail address if desired. You can then get in touc' +
            'h with us right here from within Stella if ever you have problem' +
            's, comments, or decide to take advantage of our FREE star bonus'
          TextBorder = 2
          Color = 8454143
          ParentColor = False
          WordWrap = True
        end
        object BoxLabel1: TBoxLabel
          Left = 16
          Top = 190
          Width = 556
          Height = 85
          Caption =
            ' If you are unsure of your SMTP server for outgoing mail, try lo' +
            'oking under Options in MS Mail, under Preferences|Mail in Netsca' +
            'pe Navigator'#39's Edit menu, or Tools|Options|Sending Mail in Eudor' +
            'a. When you find it you can then simply Cut and Paste it here.'
          TextBorder = 2
          Color = 8454143
          ParentColor = False
          WordWrap = True
        end
        object BoxLabel2: TBoxLabel
          Left = 16
          Top = 280
          Width = 555
          Height = 37
          Caption =
            'Once you enter your correct SMTP data, this window will no longe' +
            'r appear at startup.'
          TextBorder = 2
          Font.Color = clRed
          Font.Height = -14
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Color = 8454143
          ParentFont = False
          ParentColor = False
          WordWrap = True
        end
        object Label3: TLabel
          Left = 16
          Top = 157
          Width = 94
          Height = 16
          Caption = 'E-mail address:'
        end
        object SMTPEdit: TEdit
          Left = 128
          Top = 117
          Width = 313
          Height = 24
          Hint = 'If you'#39're not sure, ask your ISP'
          TabOrder = 0
        end
        object NotInternetConnected: TCheckBox
          Left = 21
          Top = 325
          Width = 424
          Height = 17
          Caption = 'I currently do not have a connection to the Internet'
          TabOrder = 1
        end
        object EmailEdit: TEdit
          Left = 128
          Top = 151
          Width = 313
          Height = 24
          TabOrder = 2
        end
      end
    end
    object StarsTab: TTabSheet
      Caption = 'Stars'
      object Panel2: TPanel
        Left = 7
        Top = 7
        Width = 592
        Height = 348
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object NumStarsExplainLabel: TBoxLabel
          Left = 13
          Top = 21
          Width = 565
          Height = 76
          Caption =
            'Star population bears directly on how fast Stella loads and resp' +
            'onds. With a slower PC, you might like to set the overall limiti' +
            'ng magnitude to, say, 6.0 to avoid waiting. Or perhaps you simpl' +
            'y have no use for stars beyond naked eye visibility.'
          TextBorder = 2
          Color = 8454143
          ParentColor = False
          WordWrap = True
        end
        object Label2: TLabel
          Left = 28
          Top = 128
          Width = 235
          Height = 16
          Caption = 'Enter maximum number of stars to load: '
        end
        object BoxLabel4: TBoxLabel
          Left = 18
          Top = 168
          Width = 555
          Height = 41
          Caption = 'You will need to restart Stella for this setting to take effect.'
          TextBorder = 2
          Font.Color = clRed
          Font.Height = -14
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Color = 8454143
          ParentFont = False
          ParentColor = False
        end
        object StarLoadBox: TComboBox
          Left = 275
          Top = 124
          Width = 124
          Height = 24
          ItemHeight = 16
          Items.Strings = (
            '2000'
            '2500'
            '3000'
            '3500'
            '4000'
            '4500'
            '5000'
            '5500'
            '6000'
            '7000'
            '8000'
            '9000'
            '10000'
            '11000'
            '12000'
            '13000'
            '14000'
            '15000'
            '16000')
          TabOrder = 0
        end
        object Panel12: TPanel
          Left = 67
          Top = 256
          Width = 417
          Height = 41
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 1
          object StarColourButton: TSpeedButton
            Left = 179
            Top = 9
            Width = 113
            Height = 25
            Caption = 'Star colour'
            OnClick = StarColourButtonClick
          end
          object Panel13: TPanel
            Left = 302
            Top = 5
            Width = 110
            Height = 32
            Color = 4194304
            TabOrder = 0
            object StarColour: TPanel
              Left = 46
              Top = 8
              Width = 21
              Height = 16
              BevelOuter = bvNone
              Color = clWhite
              TabOrder = 0
            end
          end
          object MonoStars: TCheckBox
            Left = 16
            Top = 12
            Width = 138
            Height = 17
            Caption = 'Monochrome stars'
            TabOrder = 1
          end
        end
      end
    end
    object FontsTab: TTabSheet
      Caption = 'Fonts'
      object Panel3: TPanel
        Left = 7
        Top = 7
        Width = 589
        Height = 350
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Panel5: TPanel
          Left = 65
          Top = 163
          Width = 443
          Height = 79
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 1
          object Label5: TLabel
            Left = 218
            Top = 7
            Width = 64
            Height = 16
            Caption = 'Report text'
          end
          object ReportFontPanel: TPanel
            Left = 213
            Top = 26
            Width = 145
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Times New Roman'
            Color = clBlack
            Font.Color = clRed
            Font.Height = -16
            Font.Name = 'Times New Roman'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
          end
          object ReportFontChangeButton: TButton
            Left = 17
            Top = 14
            Width = 75
            Height = 25
            Caption = 'Font'
            TabOrder = 1
            OnClick = ReportFontChangeButtonClick
          end
          object ReportBackgroundButton: TButton
            Left = 106
            Top = 32
            Width = 82
            Height = 25
            Caption = 'Background'
            TabOrder = 2
            OnClick = ReportBackgroundButtonClick
          end
          object ReportFontSizePanel: TPanel
            Left = 361
            Top = 25
            Width = 21
            Height = 41
            BevelOuter = bvLowered
            Caption = '10'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 3
          end
          object ReportFontStylePanel: TPanel
            Left = 385
            Top = 25
            Width = 48
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Bold'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 4
          end
          object ReportFontColorPanel: TPanel
            Left = 206
            Top = 26
            Width = 6
            Height = 41
            BevelOuter = bvLowered
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 5
          end
          object ReportFontColorButton: TButton
            Left = 17
            Top = 44
            Width = 75
            Height = 25
            Caption = 'Color'
            TabOrder = 6
            OnClick = ReportFontColorButtonClick
          end
        end
        object Panel6: TPanel
          Left = 202
          Top = 284
          Width = 185
          Height = 41
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 2
          object DefaultFonts: TCheckBox
            Left = 23
            Top = 14
            Width = 146
            Height = 17
            Caption = 'Use default fonts'
            State = cbChecked
            TabOrder = 0
          end
        end
        object Panel14: TPanel
          Left = 67
          Top = 28
          Width = 443
          Height = 79
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 3
          Visible = False
          object Label12: TLabel
            Left = 218
            Top = 7
            Width = 101
            Height = 16
            Caption = 'Window title bars'
          end
          object Panel15: TPanel
            Left = 213
            Top = 26
            Width = 145
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Times New Roman'
            Color = clBlack
            Font.Color = clRed
            Font.Height = -16
            Font.Name = 'Times New Roman'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
          end
          object TitleFontButton: TButton
            Left = 9
            Top = 14
            Width = 75
            Height = 25
            Caption = 'Font'
            Enabled = False
            TabOrder = 1
          end
          object Panel16: TPanel
            Left = 361
            Top = 25
            Width = 21
            Height = 41
            BevelOuter = bvLowered
            Caption = '10'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
          end
          object Panel17: TPanel
            Left = 385
            Top = 25
            Width = 48
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Bold'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 3
          end
          object Panel18: TPanel
            Left = 206
            Top = 26
            Width = 6
            Height = 41
            BevelOuter = bvLowered
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 4
          end
          object TitleActiveColorButton: TButton
            Left = 6
            Top = 44
            Width = 94
            Height = 25
            Caption = 'Active color'
            Enabled = False
            TabOrder = 5
          end
          object TitleInactiveColorButton: TButton
            Left = 105
            Top = 44
            Width = 94
            Height = 25
            Caption = 'Inactive color'
            Enabled = False
            TabOrder = 6
            OnClick = ReportFontColorButtonClick
          end
          object DefaultTitles: TCheckBox
            Left = 95
            Top = 15
            Width = 97
            Height = 17
            Caption = 'DefaultTitles'
            TabOrder = 7
            OnClick = DefaultTitlesClick
          end
        end
        object Panel4: TPanel
          Left = 66
          Top = 58
          Width = 443
          Height = 79
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 0
          object Label4: TLabel
            Left = 219
            Top = 5
            Width = 122
            Height = 16
            Caption = 'Data readout panels'
          end
          object ReadoutFontPanel: TPanel
            Left = 213
            Top = 25
            Width = 145
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Arial'
            Color = clBlack
            Font.Color = clMaroon
            Font.Height = -16
            Font.Name = 'Arial'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
          end
          object ReadoutFontChangeButton: TButton
            Left = 16
            Top = 14
            Width = 75
            Height = 25
            Caption = 'Font'
            TabOrder = 1
            OnClick = ReadoutFontChangeButtonClick
          end
          object ReadoutFontSizePanel: TPanel
            Left = 361
            Top = 25
            Width = 21
            Height = 41
            BevelOuter = bvLowered
            Caption = '9'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
          end
          object ReadoutFontStylePanel: TPanel
            Left = 385
            Top = 25
            Width = 48
            Height = 41
            BevelOuter = bvLowered
            Caption = 'Bold'
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 3
          end
          object ReadoutFontColorPanel: TPanel
            Left = 206
            Top = 25
            Width = 6
            Height = 41
            BevelOuter = bvLowered
            Color = clBlack
            Font.Color = clWhite
            Font.Height = -14
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 4
          end
          object ReadoutFontColorButton: TButton
            Left = 16
            Top = 44
            Width = 75
            Height = 25
            Caption = 'Color'
            TabOrder = 5
            OnClick = ReadoutFontColorButtonClick
          end
        end
      end
    end
    object ObserverTab: TTabSheet
      Caption = 'Observer'
      object BoxLabel3: TBoxLabel
        Left = 16
        Top = 4
        Width = 572
        Height = 45
        Caption =
          'Please enter your name, locality, and geographic coordinates on ' +
          'this page. Use '#39'convert'#39' if you type your position in degrees as' +
          ' a decimal fraction.'
        TextBorder = 2
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = []
        Color = 8454143
        ParentFont = False
        ParentColor = False
        WordWrap = True
      end
      object Panel8: TPanel
        Left = 70
        Top = 53
        Width = 465
        Height = 303
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Label6: TLabel
          Left = 98
          Top = 5
          Width = 251
          Height = 15
          Caption = 'At the very least, please enter your name here:'
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
        end
        object Label7: TLabel
          Left = 228
          Top = 183
          Width = 24
          Height = 16
          Caption = 'deg'
          Font.Color = clTeal
          Font.Height = -14
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 291
          Top = 183
          Width = 21
          Height = 16
          Caption = 'min'
          Font.Color = clTeal
          Font.Height = -14
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 350
          Top = 183
          Width = 22
          Height = 16
          Caption = 'sec'
          Font.Color = clTeal
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 400
          Top = 185
          Width = 51
          Height = 15
          Caption = 'N /S  E/W'
          Font.Color = clTeal
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
        end
        object Label11: TLabel
          Left = 98
          Top = 284
          Width = 261
          Height = 15
          Caption = 'Default settings will apply if any field is left blank'
          Font.Color = clRed
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
        end
        object LatLabel: TPanel
          Left = 8
          Top = 151
          Width = 122
          Height = 32
          BevelInner = bvRaised
          BevelOuter = bvLowered
          Caption = 'Latitude'
          TabOrder = 0
        end
        object LongLabel: TPanel
          Left = 8
          Top = 196
          Width = 121
          Height = 32
          BevelInner = bvRaised
          BevelOuter = bvLowered
          Caption = 'Longitude'
          TabOrder = 1
        end
        object LatDegBox: TEdit
          Left = 216
          Top = 154
          Width = 48
          Height = 24
          Hint = 'Degrees'
          MaxLength = 10
          TabOrder = 2
        end
        object LatMinBox: TEdit
          Left = 277
          Top = 154
          Width = 48
          Height = 24
          Hint = 'Minutes'
          MaxLength = 2
          TabOrder = 3
        end
        object LongDegBox: TEdit
          Left = 216
          Top = 202
          Width = 48
          Height = 24
          Hint = 'Degrees'
          MaxLength = 10
          TabOrder = 6
          OnChange = LongDegBoxChange
        end
        object LongMinBox: TEdit
          Left = 277
          Top = 202
          Width = 48
          Height = 24
          Hint = 'Minutes'
          MaxLength = 2
          TabOrder = 7
        end
        object NSBox: TComboBox
          Left = 399
          Top = 154
          Width = 52
          Height = 24
          Hint = 'North or South'
          ItemHeight = 16
          Items.Strings = (
            'N'
            'S')
          TabOrder = 5
        end
        object EWBox: TComboBox
          Left = 400
          Top = 202
          Width = 52
          Height = 24
          Hint = 'East or West'
          ItemHeight = 16
          Items.Strings = (
            'E'
            'W')
          TabOrder = 9
        end
        object Panel9: TPanel
          Left = 8
          Top = 248
          Width = 122
          Height = 32
          BevelInner = bvRaised
          BevelOuter = bvLowered
          Caption = 'Time Zone'
          TabOrder = 10
        end
        object ZoneBox: TComboBox
          Left = 216
          Top = 252
          Width = 52
          Height = 24
          Hint = 'International time zone'
          ItemHeight = 16
          Items.Strings = (
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7'
            '8'
            '9'
            '10'
            '11'
            '12')
          TabOrder = 11
        end
        object LocName1Label: TPanel
          Left = 8
          Top = 65
          Width = 123
          Height = 32
          BevelInner = bvRaised
          BevelOuter = bvLowered
          Caption = 'Locality + State'
          TabOrder = 12
        end
        object DaylightSaving: TCheckBox
          Left = 288
          Top = 255
          Width = 118
          Height = 17
          Caption = 'Daylight saving?'
          State = cbChecked
          TabOrder = 13
          OnClick = DaylightSavingClick
        end
        object LocName2Panel: TPanel
          Left = 8
          Top = 104
          Width = 122
          Height = 32
          BevelInner = bvRaised
          BevelOuter = bvLowered
          Caption = 'Country'
          TabOrder = 14
        end
        object LatSecBox: TEdit
          Left = 336
          Top = 154
          Width = 48
          Height = 24
          Hint = 'Seconds'
          MaxLength = 2
          TabOrder = 4
          Text = '0'
        end
        object LongSecBox: TEdit
          Left = 336
          Top = 202
          Width = 48
          Height = 24
          Hint = 'Seconds'
          MaxLength = 2
          TabOrder = 8
          Text = '0'
        end
        object DMSLatConvertButton: TButton
          Left = 144
          Top = 154
          Width = 60
          Height = 25
          Hint = 'Decimal degrees to deg/min/sec'
          Caption = 'Convert'
          TabOrder = 15
          OnClick = DMSLatConvertButtonClick
        end
        object DMSLongConvertButton: TButton
          Left = 144
          Top = 202
          Width = 60
          Height = 25
          Hint = 'Decimal degrees to deg/min/sec'
          Caption = 'Convert'
          TabOrder = 16
          OnClick = DMSLongConvertButtonClick
        end
        object MonikerEdit: TEdit
          Left = 82
          Top = 22
          Width = 147
          Height = 24
          Hint = 'First name'
          TabOrder = 17
        end
        object SurnameEdit: TEdit
          Left = 247
          Top = 22
          Width = 147
          Height = 24
          Hint = 'Surname'
          TabOrder = 18
        end
        object LocusEdit: TComboBox
          Left = 215
          Top = 68
          Width = 235
          Height = 24
          Hint = 'Town/city & state'
          ItemHeight = 16
          TabOrder = 19
        end
        object PatriaEdit: TComboBox
          Left = 215
          Top = 108
          Width = 235
          Height = 24
          Hint = 'Country'
          ItemHeight = 16
          TabOrder = 20
        end
        object SetButton: TButton
          Left = 144
          Top = 89
          Width = 60
          Height = 25
          Hint = 'Apply geographic selection'
          Caption = 'Set'
          TabOrder = 21
          OnClick = SetButtonClick
        end
      end
    end
    object WelcomeTab: TTabSheet
      Caption = 'Welcome'
      object Panel7: TPanel
        Left = 5
        Top = 5
        Width = 595
        Height = 355
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Memo1: TMemo
          Left = 5
          Top = 5
          Width = 583
          Height = 344
          Color = 10813439
          Lines.Strings = (
            ''

              'Welcome to Stella 2000, the Internet'#39's premier Shareware astrono' +
              'my application, and your Virtual '
            'Observatory from today. '
            ''

              'Please take a few minutes to use this tabbed notebook to set up ' +
              'Stella to your initial preferences. '

              'We particularly ask you to fill in your SMTP mail settings if at' +
              ' all possible, and perhaps the number '

              'of stars to be loaded on startup if your PC is anything less tha' +
              'n a P200.'
            ''

              'With your SMTP data correctly set, you will be able to use the S' +
              'PECIAL menu to take advantage '

              'of some unique services and bonuses open to all, registered and ' +
              'non-registered alike.'
            ''

              'To whet your appetite, how does a FREE 10000 star Hipparcos exte' +
              'nsion catalog sound? - If it '

              'appeals, fill in your mail details here and get on over to the S' +
              'pecial menu now!'
            '   '

              'I know you'#39're going to love Stella, so I'#39'll let you get acquaint' +
              'ed right away.'
            ''
            'Roger Hughes, owner & chief developer,'
            'Swimming Elk Software.')
          ReadOnly = True
          TabOrder = 0
        end
      end
    end
    object GeneralTab: TTabSheet
      Caption = 'General'
      object Panel10: TPanel
        Left = 7
        Top = 7
        Width = 592
        Height = 349
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Panel11: TPanel
          Left = 78
          Top = 50
          Width = 435
          Height = 41
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 0
          object AutoRestorePrefs: TCheckBox
            Left = 26
            Top = 12
            Width = 179
            Height = 17
            Caption = 'Auto-restore preferences'
            State = cbChecked
            TabOrder = 0
          end
          object AutoStorePrefs: TCheckBox
            Left = 243
            Top = 13
            Width = 186
            Height = 17
            Caption = 'Auto-store preferences'
            State = cbChecked
            TabOrder = 1
          end
        end
        object LimitingMagBox: TGroupBox
          Left = 79
          Top = 129
          Width = 433
          Height = 83
          Caption = 'Limiting magnitudes '
          TabOrder = 1
          object Panel19: TPanel
            Left = 22
            Top = 25
            Width = 147
            Height = 41
            TabOrder = 0
            object Label13: TLabel
              Left = 11
              Top = 12
              Width = 46
              Height = 16
              Caption = 'Comets'
            end
            object CometMagBox: TComboBox
              Left = 84
              Top = 8
              Width = 51
              Height = 24
              ItemHeight = 16
              Items.Strings = (
                '1'
                '2'
                '3'
                '4'
                '5'
                '6'
                '7'
                '8'
                '9'
                '10'
                '11'
                '12'
                '13'
                '14'
                '15')
              TabOrder = 0
              Text = '7'
              OnChange = CometMagBoxChange
            end
          end
          object Panel20: TPanel
            Left = 254
            Top = 24
            Width = 147
            Height = 41
            TabOrder = 1
            object Label14: TLabel
              Left = 11
              Top = 12
              Width = 57
              Height = 16
              Caption = 'Asteroids'
            end
            object AsteroidMagBox: TComboBox
              Left = 84
              Top = 8
              Width = 51
              Height = 24
              Enabled = False
              ItemHeight = 16
              Items.Strings = (
                '1'
                '2'
                '3'
                '4'
                '5'
                '6'
                '7'
                '8'
                '9'
                '10'
                '11'
                '12'
                '13'
                '14'
                '15')
              TabOrder = 0
              Text = '9'
            end
          end
        end
        object GroupBox1: TGroupBox
          Left = 78
          Top = 244
          Width = 437
          Height = 82
          Caption = 'Misc. settings'
          TabOrder = 2
          object SearchWithCenter: TCheckBox
            Left = 17
            Top = 35
            Width = 198
            Height = 17
            Caption = 'Auto-center during searches?'
            State = cbChecked
            TabOrder = 0
          end
        end
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 407
    Width = 632
    Height = 41
    Align = alBottom
    BevelInner = bvLowered
    BevelOuter = bvLowered
    TabOrder = 1
    object OKButton: TButton
      Left = 131
      Top = 8
      Width = 75
      Height = 25
      Hint = 'Save settings and close window'
      Caption = 'OK'
      TabOrder = 0
      OnClick = OKButtonClick
    end
    object CancelButton: TButton
      Left = 284
      Top = 8
      Width = 75
      Height = 25
      Hint = 'Exit dialog and do nothing'
      Caption = 'Cancel'
      TabOrder = 1
      OnClick = CancelButtonClick
    end
    object ApplyButton: TButton
      Left = 421
      Top = 8
      Width = 75
      Height = 25
      Hint = 'Apply settings globally'
      Caption = 'Apply'
      TabOrder = 2
      OnClick = ApplyButtonClick
    end
  end
  object IniOut1: TIniOut
    FileName = 'STELLA.INI'
    Items.Strings = (
      'SMTPEdit;Text;;Setup;SMTP server;1;0'
      'StarLoadBox;Text;16000;Setup;StarsToLoad;1;0'
      'EmailEdit;Text;;Setup;EmailAddress;1;0'

        'NotInternetConnected;Checked;False;Setup;Internet connection abs' +
        'ent?;1;0'

        'ReadoutFontPanel;Caption;MS Sans Serif;Fonts;Readout panel font ' +
        'name;1;0'
      'ReadoutFontSizePanel;Caption;8;Fonts;Readout panel font size;1;0'

        'ReadoutFontStylePanel;Caption;Bold;Fonts;Readout panel font styl' +
        'e;1;0'

        'ReadoutFontColorPanel;Color;clMaroon;Fonts;Readout panel font co' +
        'lor;1;0'
      'ReportFontPanel;Caption;MS Sans Serif;Fonts;Report font name;1;0'
      'ReportFontSizePanel;Caption;7;Fonts;Report font size;1;0'
      'ReportFontStylePanel;Caption;Bold;Fonts;Report font style;1;0'
      'ReportFontColorPanel;Color;clTeal;Fonts;Report font color;1;0'
      'ReportFontPanel;Color;;Fonts;Report background color;1;0'
      'DefaultFonts;Checked;True;Fonts;Use default fonts;1;0'
      'MonikerEdit;Text;;Observer;First name;1;0'
      'SurnameEdit;Text;;Observer;Surname;1;0'
      'LocusEdit;Text;;Observer;Locality;1;0'
      'PatriaEdit;Text;;Observer;Country;1;0'
      'LatDegBox;Text;;Observer;Lat degrees;1;0'
      'LatMinBox;Text;;Observer;Lat minutes;1;0')
    RegistryRoot = CURRENT_USER
    Left = 396
    Top = 1
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 562
    Top = 412
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 595
    Top = 412
  end
  object IniOut2: TIniOut
    FileName = 'STELLA.INI'
    Items.Strings = (
      'LatSecBox;Text;0;Observer;Lat seconds;1;0'
      'NSBox;Text;N;Observer;North or South;1;0'
      'LongDegBox;Text;;Observer;Long degrees;1;0'
      'LongMinBox;Text;;Observer;Long minutes;1;0'
      'LongSecBox;Text;0;Observer;Long seconds;1;0'
      'ZoneBox;Text;;Observer;Zone;1;0'
      'DaylightSaving;Checked;True;Observer;Daylight saving?;1;0'
      'EWBox;Text;;Observer;East or West;1;0'
      'AutoRestorePrefs;Checked;True;General;Auto-restore prefs;1;0'
      'AutoRestorePrefs;Checked;True;General;Auto restore settings;1;0'
      'AutoStorePrefs;Checked;True;General;Auto store settings;1;0'
      'MonoStars;Checked;False;Display;Mono stars;1;0'
      'StarColour;Color;clWhite;Display;Mono star colour;1;0'
      'SearchWithCenter;Checked;True;Display;Search with center;1;0')
    RegistryRoot = CURRENT_USER
    Left = 427
    Top = 1
  end
  object CSV1: TCSVStringInfo
    Left = 603
  end
end